/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue71 / CSharp / Delphi / Unit1.dcu

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 8b 14 1f f2 99 15 00 00 | 2d 6c b4 2a 00 00 00 00 |........|-l.*....|
|00000010| 00 96 00 3c 70 09 55 6e | 69 74 31 2e 70 61 73 2d |...<p.Un|it1.pas-|
|00000020| 6c b4 2a 00 72 09 55 6e | 69 74 31 2e 44 46 4d f3 |l.*.r.Un|it1.DFM.|
|00000030| 6b b4 2a 02 64 08 45 78 | 74 43 74 72 6c 73 2d a3 |k.*.d.Ex|tCtrls-.|
|00000040| a6 49 66 06 54 49 6d 61 | 67 65 b6 09 a0 d3 66 0b |.If.TIma|ge....f.|
|00000050| 54 52 61 64 69 6f 47 72 | 6f 75 70 db 28 87 26 67 |TRadioGr|oup.(.&g|
|00000060| 07 2e 54 49 6d 61 67 65 | 10 f3 76 bf 67 0c 2e 54 |..TImage|..v.g..T|
|00000070| 52 61 64 69 6f 47 72 6f | 75 70 35 12 5e 12 63 64 |RadioGro|up5.^.cd|
|00000080| 08 43 68 65 63 6b 4c 73 | 74 2d a3 a6 49 66 0d 54 |.CheckLs|t-..If.T|
|00000090| 43 68 65 63 6b 4c 69 73 | 74 42 6f 78 17 2d b5 50 |CheckLis|tBox.-.P|
|000000a0| 67 0e 2e 54 43 68 65 63 | 6b 4c 69 73 74 42 6f 78 |g..TChec|kListBox|
|000000b0| 71 16 8c 3c 67 18 54 43 | 68 65 63 6b 4c 69 73 74 |q..<g.TC|heckList|
|000000c0| 42 6f 78 2e 47 65 74 43 | 68 65 63 6b 65 64 0f f0 |Box.GetC|hecked..|
|000000d0| a2 74 67 18 54 43 68 65 | 63 6b 4c 69 73 74 42 6f |.tg.TChe|ckListBo|
|000000e0| 78 2e 53 65 74 43 68 65 | 63 6b 65 64 0e f0 a2 74 |x.SetChe|cked...t|
|000000f0| 67 1c 54 43 68 65 63 6b | 4c 69 73 74 42 6f 78 2e |g.TCheck|ListBox.|
|00000100| 53 65 74 49 74 65 6d 45 | 6e 61 62 6c 65 64 1d f0 |SetItemE|nabled..|
|00000110| a2 74 63 64 08 53 74 64 | 43 74 72 6c 73 2d a3 a6 |.tcd.Std|Ctrls-..|
|00000120| 49 66 06 54 4c 61 62 65 | 6c 93 34 9b 22 66 07 54 |If.TLabe|l.4."f.T|
|00000130| 42 75 74 74 6f 6e ea d7 | e2 42 66 05 54 45 64 69 |Button..|.Bf.TEdi|
|00000140| 74 0f 72 a4 3e 67 07 2e | 54 4c 61 62 65 6c ed 1d |t.r.>g..|TLabel..|
|00000150| 72 0e 67 08 2e 54 42 75 | 74 74 6f 6e 44 c1 b9 2e |r.g..TBu|ttonD...|
|00000160| 67 06 2e 54 45 64 69 74 | 69 5b 7b 2a 63 64 07 44 |g..TEdit|i[{*cd.D|
|00000170| 69 61 6c 6f 67 73 2d a3 | a6 49 67 0b 53 68 6f 77 |ialogs-.|.Ig.Show|
|00000180| 4d 65 73 73 61 67 65 91 | ba 82 94 63 64 05 46 6f |Message.|...cd.Fo|
|00000190| 72 6d 73 2d a3 a6 49 66 | 05 54 46 6f 72 6d f7 95 |rms-..If|.TForm..|
|000001a0| 29 98 67 06 2e 54 46 6f | 72 6d 51 7f 00 84 67 19 |).g..TFo|rmQ...g.|
|000001b0| 54 43 75 73 74 6f 6d 46 | 6f 72 6d 2e 41 6c 69 67 |TCustomF|orm.Alig|
|000001c0| 6e 43 6f 6e 74 72 6f 6c | 73 7f 90 40 fc 67 18 54 |nControl|s..@.g.T|
|000001d0| 43 75 73 74 6f 6d 46 6f | 72 6d 2e 43 72 65 61 74 |CustomFo|rm.Creat|
|000001e0| 65 50 61 72 61 6d 73 82 | 90 40 fc 67 1e 54 43 75 |eParams.|.@.g.TCu|
|000001f0| 73 74 6f 6d 46 6f 72 6d | 2e 43 72 65 61 74 65 57 |stomForm|.CreateW|
|00000200| 69 6e 64 6f 77 48 61 6e | 64 6c 65 83 90 40 fc 67 |indowHan|dle..@.g|
|00000210| 15 54 43 75 73 74 6f 6d | 46 6f 72 6d 2e 43 72 65 |.TCustom|Form.Cre|
|00000220| 61 74 65 57 6e 64 84 90 | 40 fc 67 1c 54 43 75 73 |ateWnd..|@.g.TCus|
|00000230| 74 6f 6d 46 6f 72 6d 2e | 44 65 66 69 6e 65 50 72 |tomForm.|DefinePr|
|00000240| 6f 70 65 72 74 69 65 73 | 86 90 40 fc 67 1f 54 43 |operties|..@.g.TC|
|00000250| 75 73 74 6f 6d 46 6f 72 | 6d 2e 44 65 73 74 72 6f |ustomFor|m.Destro|
|00000260| 79 57 69 6e 64 6f 77 48 | 61 6e 64 6c 65 87 90 40 |yWindowH|andle..@|
|00000270| fc 67 14 54 43 75 73 74 | 6f 6d 46 6f 72 6d 2e 44 |.g.TCust|omForm.D|
|00000280| 6f 43 72 65 61 74 65 89 | 90 40 fc 67 15 54 43 75 |oCreate.|.@.g.TCu|
|00000290| 73 74 6f 6d 46 6f 72 6d | 2e 44 6f 44 65 73 74 72 |stomForm|.DoDestr|
|000002a0| 6f 79 8a 90 40 fc 67 19 | 54 43 75 73 74 6f 6d 46 |oy..@.g.|TCustomF|
|000002b0| 6f 72 6d 2e 47 65 74 43 | 6c 69 65 6e 74 52 65 63 |orm.GetC|lientRec|
|000002c0| 74 8d 90 40 fc 67 17 54 | 43 75 73 74 6f 6d 46 6f |t..@.g.T|CustomFo|
|000002d0| 72 6d 2e 47 65 74 46 6c | 6f 61 74 69 6e 67 8f 90 |rm.GetFl|oating..|
|000002e0| 40 fc 67 12 54 43 75 73 | 74 6f 6d 46 6f 72 6d 2e |@.g.TCus|tomForm.|
|000002f0| 4c 6f 61 64 65 64 90 90 | 40 fc 67 18 54 43 75 73 |Loaded..|@.g.TCus|
|00000300| 74 6f 6d 46 6f 72 6d 2e | 4e 6f 74 69 66 69 63 61 |tomForm.|Notifica|
|00000310| 74 69 6f 6e 91 90 40 fc | 67 17 54 43 75 73 74 6f |tion..@.|g.TCusto|
|00000320| 6d 46 6f 72 6d 2e 50 61 | 69 6e 74 57 69 6e 64 6f |mForm.Pa|intWindo|
|00000330| 77 93 90 40 fc 67 1a 54 | 43 75 73 74 6f 6d 46 6f |w..@.g.T|CustomFo|
|00000340| 72 6d 2e 51 75 65 72 79 | 49 6e 74 65 72 66 61 63 |rm.Query|Interfac|
|00000350| 65 95 90 40 fc 67 15 54 | 43 75 73 74 6f 6d 46 6f |e..@.g.T|CustomFo|
|00000360| 72 6d 2e 52 65 61 64 53 | 74 61 74 65 96 90 40 fc |rm.ReadS|tate..@.|
|00000370| 67 1d 54 43 75 73 74 6f | 6d 46 6f 72 6d 2e 53 65 |g.TCusto|mForm.Se|
|00000380| 74 50 61 72 65 6e 74 42 | 69 44 69 4d 6f 64 65 99 |tParentB|iDiMode.|
|00000390| 90 40 fc 67 15 54 43 75 | 73 74 6f 6d 46 6f 72 6d |.@.g.TCu|stomForm|
|000003a0| 2e 53 65 74 50 61 72 65 | 6e 74 9b 90 40 fc 67 19 |.SetPare|nt..@.g.|
|000003b0| 54 43 75 73 74 6f 6d 46 | 6f 72 6d 2e 55 70 64 61 |TCustomF|orm.Upda|
|000003c0| 74 65 41 63 74 69 6f 6e | 73 9c 90 40 fc 67 1a 54 |teAction|s..@.g.T|
|000003d0| 43 75 73 74 6f 6d 46 6f | 72 6d 2e 56 61 6c 69 64 |CustomFo|rm.Valid|
|000003e0| 61 74 65 52 65 6e 61 6d | 65 9e 90 40 fc 67 13 54 |ateRenam|e..@.g.T|
|000003f0| 43 75 73 74 6f 6d 46 6f | 72 6d 2e 57 6e 64 50 72 |CustomFo|rm.WndPr|
|00000400| 6f 63 a0 90 40 fc 67 14 | 54 43 75 73 74 6f 6d 46 |oc..@.g.|TCustomF|
|00000410| 6f 72 6d 2e 52 65 73 69 | 7a 69 6e 67 a1 90 40 fc |orm.Resi|zing..@.|
|00000420| 67 12 54 43 75 73 74 6f | 6d 46 6f 72 6d 2e 43 72 |g.TCusto|mForm.Cr|
|00000430| 65 61 74 65 d4 90 40 fc | 67 15 54 43 75 73 74 6f |eate..@.|g.TCusto|
|00000440| 6d 46 6f 72 6d 2e 43 72 | 65 61 74 65 4e 65 77 d5 |mForm.Cr|eateNew.|
|00000450| 90 40 fc 67 13 54 43 75 | 73 74 6f 6d 46 6f 72 6d |.@.g.TCu|stomForm|
|00000460| 2e 44 65 73 74 72 6f 79 | d6 90 40 fc 67 1d 54 43 |.Destroy|..@.g.TC|
|00000470| 75 73 74 6f 6d 46 6f 72 | 6d 2e 41 66 74 65 72 43 |ustomFor|m.AfterC|
|00000480| 6f 6e 73 74 72 75 63 74 | 69 6f 6e d7 90 40 fc 67 |onstruct|ion..@.g|
|00000490| 1d 54 43 75 73 74 6f 6d | 46 6f 72 6d 2e 42 65 66 |.TCustom|Form.Bef|
|000004a0| 6f 72 65 44 65 73 74 72 | 75 63 74 69 6f 6e d8 90 |oreDestr|uction..|
|000004b0| 40 fc 67 16 54 43 75 73 | 74 6f 6d 46 6f 72 6d 2e |@.g.TCus|tomForm.|
|000004c0| 43 6c 6f 73 65 51 75 65 | 72 79 da 90 40 fc 67 1a |CloseQue|ry..@.g.|
|000004d0| 54 43 75 73 74 6f 6d 46 | 6f 72 6d 2e 44 65 66 61 |TCustomF|orm.Defa|
|000004e0| 75 6c 74 48 61 6e 64 6c | 65 72 db 90 40 fc 67 14 |ultHandl|er..@.g.|
|000004f0| 54 43 75 73 74 6f 6d 46 | 6f 72 6d 2e 53 65 74 46 |TCustomF|orm.SetF|
|00000500| 6f 63 75 73 e6 90 40 fc | 67 1d 54 43 75 73 74 6f |ocus..@.|g.TCusto|
|00000510| 6d 46 6f 72 6d 2e 53 65 | 74 46 6f 63 75 73 65 64 |mForm.Se|tFocused|
|00000520| 43 6f 6e 74 72 6f 6c e7 | 90 40 fc 67 15 54 43 75 |Control.|.@.g.TCu|
|00000530| 73 74 6f 6d 46 6f 72 6d | 2e 53 68 6f 77 4d 6f 64 |stomForm|.ShowMod|
|00000540| 61 6c e9 90 40 fc 67 18 | 54 43 75 73 74 6f 6d 46 |al..@.g.|TCustomF|
|00000550| 6f 72 6d 2e 57 61 6e 74 | 43 68 69 6c 64 4b 65 79 |orm.Want|ChildKey|
|00000560| ea 90 40 fc 67 25 54 53 | 63 72 6f 6c 6c 69 6e 67 |..@.g%TS|crolling|
|00000570| 57 69 6e 43 6f 6e 74 72 | 6f 6c 2e 41 64 6a 75 73 |WinContr|ol.Adjus|
|00000580| 74 43 6c 69 65 6e 74 52 | 65 63 74 39 e3 ee 45 67 |tClientR|ect9..Eg|
|00000590| 26 54 53 63 72 6f 6c 6c | 69 6e 67 57 69 6e 43 6f |&TScroll|ingWinCo|
|000005a0| 6e 74 72 6f 6c 2e 41 75 | 74 6f 53 63 72 6f 6c 6c |ntrol.Au|toScroll|
|000005b0| 45 6e 61 62 6c 65 64 3b | e3 ee 45 67 25 54 53 63 |Enabled;|..Eg%TSc|
|000005c0| 72 6f 6c 6c 69 6e 67 57 | 69 6e 43 6f 6e 74 72 6f |rollingW|inContro|
|000005d0| 6c 2e 41 75 74 6f 53 63 | 72 6f 6c 6c 49 6e 56 69 |l.AutoSc|rollInVi|
|000005e0| 65 77 3c e3 ee 45 63 64 | 08 43 6f 6e 74 72 6f 6c |ew<..Ecd|.Control|
|000005f0| 73 2d a3 a6 49 67 14 54 | 57 69 6e 43 6f 6e 74 72 |s-..Ig.T|WinContr|
|00000600| 6f 6c 2e 41 73 73 69 67 | 6e 54 6f 1b 3f eb ae 67 |ol.Assig|nTo.?..g|
|00000610| 17 54 57 69 6e 43 6f 6e | 74 72 6f 6c 2e 43 61 6e |.TWinCon|trol.Can|
|00000620| 41 75 74 6f 53 69 7a 65 | 1f 3f eb ae 67 15 54 57 |AutoSize|.?..g.TW|
|00000630| 69 6e 43 6f 6e 74 72 6f | 6c 2e 43 61 6e 52 65 73 |inContro|l.CanRes|
|00000640| 69 7a 65 20 3f eb ae 67 | 1d 54 57 69 6e 43 6f 6e |ize ?..g|.TWinCon|
|00000650| 74 72 6f 6c 2e 43 6f 6e | 73 74 72 61 69 6e 65 64 |trol.Con|strained|
|00000660| 52 65 73 69 7a 65 22 3f | eb ae 67 18 54 57 69 6e |Resize"?|..g.TWin|
|00000670| 43 6f 6e 74 72 6f 6c 2e | 43 72 65 61 74 65 48 61 |Control.|CreateHa|
|00000680| 6e 64 6c 65 24 3f eb ae | 67 16 54 57 69 6e 43 6f |ndle$?..|g.TWinCo|
|00000690| 6e 74 72 6f 6c 2e 44 65 | 73 74 72 6f 79 57 6e 64 |ntrol.De|stroyWnd|
|000006a0| 2b 3f eb ae 67 1b 54 57 | 69 6e 43 6f 6e 74 72 6f |+?..g.TW|inContro|
|000006b0| 6c 2e 47 65 74 43 6c 69 | 65 6e 74 4f 72 69 67 69 |l.GetCli|entOrigi|
|000006c0| 6e 3e 3f eb ae 67 1d 54 | 57 69 6e 43 6f 6e 74 72 |n>?..g.T|WinContr|
|000006d0| 6f 6c 2e 47 65 74 43 6f | 6e 74 72 6f 6c 45 78 74 |ol.GetCo|ntrolExt|
|000006e0| 65 6e 74 73 40 3f eb ae | 67 1c 54 57 69 6e 43 6f |ents@?..|g.TWinCo|
|000006f0| 6e 74 72 6f 6c 2e 47 65 | 74 44 65 76 69 63 65 43 |ntrol.Ge|tDeviceC|
|00000700| 6f 6e 74 65 78 74 41 3f | eb ae 67 17 54 57 69 6e |ontextA?|..g.TWin|
|00000710| 43 6f 6e 74 72 6f 6c 2e | 53 68 6f 77 43 6f 6e 74 |Control.|ShowCont|
|00000720| 72 6f 6c 5b 3f eb ae 67 | 16 54 57 69 6e 43 6f 6e |rol[?..g|.TWinCon|
|00000730| 74 72 6f 6c 2e 49 6e 76 | 61 6c 69 64 61 74 65 8f |trol.Inv|alidate.|
|00000740| 3f eb ae 67 13 54 57 69 | 6e 43 6f 6e 74 72 6f 6c |?..g.TWi|nControl|
|00000750| 2e 52 65 70 61 69 6e 74 | 94 3f eb ae 67 15 54 57 |.Repaint|.?..g.TW|
|00000760| 69 6e 43 6f 6e 74 72 6f | 6c 2e 53 65 74 42 6f 75 |inContro|l.SetBou|
|00000770| 6e 64 73 97 3f eb ae 67 | 12 54 57 69 6e 43 6f 6e |nds.?..g|.TWinCon|
|00000780| 74 72 6f 6c 2e 55 70 64 | 61 74 65 99 3f eb ae 67 |trol.Upd|ate.?..g|
|00000790| 16 54 43 6f 6e 74 72 6f | 6c 2e 47 65 74 44 72 61 |.TContro|l.GetDra|
|000007a0| 67 49 6d 61 67 65 73 b6 | da 1c 29 67 13 54 43 6f |gImages.|..)g.TCo|
|000007b0| 6e 74 72 6f 6c 2e 47 65 | 74 45 6e 61 62 6c 65 64 |ntrol.Ge|tEnabled|
|000007c0| b7 da 1c 29 67 21 54 43 | 6f 6e 74 72 6f 6c 2e 47 |...)g!TC|ontrol.G|
|000007d0| 65 74 46 6c 6f 61 74 69 | 6e 67 44 6f 63 6b 53 69 |etFloati|ngDockSi|
|000007e0| 74 65 43 6c 61 73 73 b9 | da 1c 29 67 14 54 43 6f |teClass.|..)g.TCo|
|000007f0| 6e 74 72 6f 6c 2e 53 65 | 74 44 72 61 67 4d 6f 64 |ntrol.Se|tDragMod|
|00000800| 65 c8 da 1c 29 67 13 54 | 43 6f 6e 74 72 6f 6c 2e |e...)g.T|Control.|
|00000810| 53 65 74 45 6e 61 62 6c | 65 64 c9 da 1c 29 67 10 |SetEnabl|ed...)g.|
|00000820| 54 43 6f 6e 74 72 6f 6c | 2e 53 65 74 4e 61 6d 65 |TControl|.SetName|
|00000830| ca da 1c 29 67 14 54 43 | 6f 6e 74 72 6f 6c 2e 53 |...)g.TC|ontrol.S|
|00000840| 65 74 42 69 44 69 4d 6f | 64 65 ce da 1c 29 67 17 |etBiDiMo|de...)g.|
|00000850| 54 43 6f 6e 74 72 6f 6c | 2e 49 6e 69 74 69 61 74 |TControl|.Initiat|
|00000860| 65 41 63 74 69 6f 6e 08 | db 1c 29 67 10 54 43 6f |eAction.|..)g.TCo|
|00000870| 6e 74 72 6f 6c 2e 53 65 | 74 54 65 78 74 74 da 1c |ntrol.Se|tTextt..|
|00000880| 29 63 64 08 47 72 61 70 | 68 69 63 73 2d a3 a6 49 |)cd.Grap|hics-..I|
|00000890| 63 64 07 43 6c 61 73 73 | 65 73 2d a3 a6 49 67 19 |cd.Class|es-..Ig.|
|000008a0| 54 43 6f 6d 70 6f 6e 65 | 6e 74 2e 55 70 64 61 74 |TCompone|nt.Updat|
|000008b0| 65 52 65 67 69 73 74 72 | 79 a8 f5 57 39 67 15 54 |eRegistr|y..W9g.T|
|000008c0| 43 6f 6d 70 6f 6e 65 6e | 74 2e 57 72 69 74 65 53 |Componen|t.WriteS|
|000008d0| 74 61 74 65 ac f5 57 39 | 67 1c 54 43 6f 6d 70 6f |tate..W9|g.TCompo|
|000008e0| 6e 65 6e 74 2e 53 61 66 | 65 43 61 6c 6c 45 78 63 |nent.Saf|eCallExc|
|000008f0| 65 70 74 69 6f 6e c3 f5 | 57 39 67 12 54 50 65 72 |eption..|W9g.TPer|
|00000900| 73 69 73 74 65 6e 74 2e | 41 73 73 69 67 6e c3 b5 |sistent.|Assign..|
|00000910| 6d ac 63 64 08 53 79 73 | 55 74 69 6c 73 2d a3 a6 |m.cd.Sys|Utils-..|
|00000920| 49 67 06 46 6f 72 6d 61 | 74 4c 53 ac 1c 67 0a 46 |Ig.Forma|tLS..g.F|
|00000930| 6c 6f 61 74 54 6f 53 74 | 72 84 fa a6 6d 63 64 08 |loatToSt|r...mcd.|
|00000940| 4d 65 73 73 61 67 65 73 | 2d a3 a6 49 63 64 07 57 |Messages|-..Icd.W|
|00000950| 69 6e 64 6f 77 73 2d a3 | a6 49 63 64 07 53 79 73 |indows-.|.Icd.Sys|
|00000960| 49 6e 69 74 2d a3 a6 49 | 63 64 06 53 79 73 74 65 |Init-..I|cd.Syste|
|00000970| 6d 2d a3 a6 49 66 07 54 | 4f 62 6a 65 63 74 f7 21 |m-..If.T|Object.!|
|00000980| 20 47 67 10 54 4f 62 6a | 65 63 74 2e 44 69 73 70 | Gg.TObj|ect.Disp|
|00000990| 61 74 63 68 fb e4 0d 6b | 67 13 54 4f 62 6a 65 63 |atch...k|g.TObjec|
|000009a0| 74 2e 4e 65 77 49 6e 73 | 74 61 6e 63 65 fd e4 0d |t.NewIns|tance...|
|000009b0| 6b 67 14 54 4f 62 6a 65 | 63 74 2e 46 72 65 65 49 |kg.TObje|ct.FreeI|
|000009c0| 6e 73 74 61 6e 63 65 fe | e4 0d 6b 66 06 44 6f 75 |nstance.|..kf.Dou|
|000009d0| 62 6c 65 f9 a9 c3 56 66 | 07 49 6e 74 65 67 65 72 |ble...Vf|.Integer|
|000009e0| 9d 7c 9f 6f 66 06 53 74 | 72 69 6e 67 9a 38 ff f1 |.|.of.St|ring.8..|
|000009f0| 66 0a 41 6e 73 69 53 74 | 72 69 6e 67 9a 38 ff f1 |f.AnsiSt|ring.8..|
|00000a00| 67 10 40 43 68 65 63 6b | 41 75 74 6f 52 65 73 75 |g.@Check|AutoResu|
|00000a10| 6c 74 58 2c 54 64 67 08 | 40 4c 53 74 72 43 6c 72 |ltX,Tdg.|@LStrClr|
|00000a20| 84 ef ef 00 67 0a 40 49 | 6e 74 66 43 6c 65 61 72 |....g.@I|ntfClear|
|00000a30| d3 f2 ac 3c 67 0e 40 48 | 61 6e 64 6c 65 46 69 6e |...<g.@H|andleFin|
|00000a40| 61 6c 6c 79 58 2c 54 64 | 67 05 46 61 6c 73 65 a6 |allyX,Td|g.False.|
|00000a50| 31 d8 6f 67 08 40 41 73 | 43 6c 61 73 73 58 2c 54 |1.og.@As|ClassX,T|
|00000a60| 64 66 0a 4f 6c 65 56 61 | 72 69 61 6e 74 0a 49 67 |df.OleVa|riant.Ig|
|00000a70| 89 66 07 56 61 72 69 61 | 6e 74 4a d4 68 37 67 0b |.f.Varia|ntJ.h7g.|
|00000a80| 40 44 69 73 70 49 6e 76 | 6f 6b 65 93 2c 54 64 66 |@DispInv|oke.,Tdf|
|00000a90| 09 49 44 69 73 70 61 74 | 63 68 1e a1 1b b0 67 0c |.IDispat|ch....g.|
|00000aa0| 40 56 61 72 46 72 6f 6d | 44 69 73 70 31 c9 6b 21 |@VarFrom|Disp1.k!|
|00000ab0| 67 0a 40 56 61 72 54 6f | 52 65 61 6c 58 2c 54 64 |g.@VarTo|RealX,Td|
|00000ac0| 67 07 40 56 61 72 43 6c | 72 58 2c 54 64 63 65 06 |g.@VarCl|rX,Tdce.|
|00000ad0| 43 6f 6d 4f 62 6a 2d a3 | a6 49 67 0f 43 72 65 61 |ComObj-.|.Ig.Crea|
|00000ae0| 74 65 4f 6c 65 4f 62 6a | 65 63 74 1a d1 0c c3 63 |teOleObj|ect....c|
|00000af0| 65 0d 54 44 4d 57 65 62 | 4c 69 62 5f 54 4c 42 00 |e.TDMWeb|Lib_TLB.|
|00000b00| 00 00 00 66 08 5f 50 61 | 63 6b 61 67 65 b8 71 77 |...f._Pa|ckage.qw|
|00000b10| 54 66 09 43 6f 50 61 63 | 6b 61 67 65 c7 ac 25 aa |Tf.CoPac|kage..%.|
|00000b20| 67 0a 2e 43 6f 50 61 63 | 6b 61 67 65 21 96 fc 95 |g..CoPac|kage!...|
|00000b30| 67 10 43 6f 50 61 63 6b | 61 67 65 2e 43 72 65 61 |g.CoPack|age.Crea|
|00000b40| 74 65 b7 6f 13 ce 63 26 | 07 2e 54 46 6f 72 6d 31 |te.o..c&|..TForm1|
|00000b50| 80 ca 36 66 0e 24 00 2a | 06 54 46 6f 72 6d 31 88 |..6f.$.*|.TForm1.|
|00000b60| 70 4d 8f 22 26 20 05 46 | 6f 72 6d 31 e6 7e b3 a8 |pM."& .F|orm1.~..|
|00000b70| 22 26 3e 20 02 2e 32 66 | 28 00 28 18 54 46 6f 72 |"&> ..2f|(.(.TFor|
|00000b80| 6d 31 2e 62 74 6e 43 61 | 6c 63 75 6c 61 74 65 43 |m1.btnCa|lculateC|
|00000b90| 6c 69 63 6b 80 68 10 7d | 46 00 11 07 08 2a 21 04 |lick.h.}|F....*!.|
|00000ba0| 53 65 6c 66 16 26 0a 21 | 06 53 65 6e 64 65 72 16 |Self.&.!|.Sender.|
|00000bb0| 10 02 20 03 6f 62 6a 66 | 20 f8 20 04 63 6f 73 74 |.. .objf| . .cost|
|00000bc0| 66 12 e0 20 01 69 16 14 | 06 20 07 6f 70 74 69 6f |f.. .i..|. .optio|
|00000bd0| 6e 73 66 14 d8 63 28 15 | 54 46 6f 72 6d 31 2e 72 |nsf..c(.|TForm1.r|
|00000be0| 67 50 61 63 6b 61 67 65 | 43 6c 69 63 6b 80 69 10 |gPackage|Click.i.|
|00000bf0| 7d 46 00 de 08 2a 21 04 | 53 65 6c 66 16 26 08 21 |}F...*!.|Self.&.!|
|00000c00| 06 53 65 6e 64 65 72 16 | 10 0c 20 01 69 16 14 0a |.Sender.|.. .i...|
|00000c10| 63 28 13 54 46 6f 72 6d | 31 2e 42 75 74 74 6f 6e |c(.TForm|1.Button|
|00000c20| 31 43 6c 69 63 6b 80 6a | 10 7d 46 00 31 03 08 2a |1Click.j|.}F.1..*|
|00000c30| 21 04 53 65 6c 66 16 26 | 00 21 06 53 65 6e 64 65 |!.Self.&|.!.Sende|
|00000c40| 72 16 10 02 20 03 6f 62 | 6a 66 1a e0 63 28 0c 46 |r... .ob|jf..c(.F|
|00000c50| 69 6e 61 6c 69 7a 61 74 | 69 6f 6e 80 58 2c 54 64 |inalizat|ion.X,Td|
|00000c60| 00 5c 21 20 2a 63 28 05 | 55 6e 69 74 31 80 00 00 |.\! *c(.|Unit1...|
|00000c70| 00 00 00 10 21 10 2a 63 | 47 00 08 00 26 31 08 46 |....!.*c|G...&1.F|
|00000c80| 3c 08 fa 0e 00 c1 0b f8 | 70 b9 fe ac 06 00 2c 06 |<.......|p.....,.|
|00000c90| 49 6d 61 67 65 31 14 02 | 41 0b 2c 09 72 67 50 61 |Image1..|A.,.rgPa|
|00000ca0| 63 6b 61 67 65 14 04 51 | 0b 2c 0a 63 6c 62 4f 70 |ckage..Q|.,.clbOp|
|00000cb0| 74 69 6f 6e 73 14 06 61 | 0b 2c 06 4c 61 62 65 6c |tions..a|.,.Label|
|00000cc0| 31 14 08 71 0b 2c 0c 62 | 74 6e 43 61 6c 63 75 6c |1..q.,.b|tnCalcul|
|00000cd0| 61 74 65 14 0a 81 0b 2c | 07 65 64 74 43 6f 73 74 |ate....,|.edtCost|
|00000ce0| 14 0c 91 0b 2c 06 4c 61 | 62 65 6c 32 14 08 a1 0b |....,.La|bel2....|
|00000cf0| 2c 07 42 75 74 74 6f 6e | 31 14 0a b1 0b 2d 11 62 |,.Button|1....-.b|
|00000d00| 74 6e 43 61 6c 63 75 6c | 61 74 65 43 6c 69 63 6b |tnCalcul|ateClick|
|00000d10| 14 ee 01 02 2d 0e 72 67 | 50 61 63 6b 61 67 65 43 |....-.rg|PackageC|
|00000d20| 6c 69 63 6b 14 ee 1d 02 | 2d 0c 42 75 74 74 6f 6e |lick....|-.Button|
|00000d30| 31 43 6c 69 63 6b 14 ee | 2d 02 63 44 00 08 00 28 |1Click..|-.cD...(|
|00000d40| 0f 00 00 00 80 0f ff ff | ff 7f 10 40 00 00 00 6c |........|...@...l|
|00000d50| 7d 15 4c 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}.L.....|........|
|00000d60| 00 00 04 00 00 00 2c 01 | 00 00 a9 01 00 00 00 00 |......,.|........|
|00000d70| 00 00 eb 01 00 00 f0 02 | 00 00 00 00 00 00 00 00 |........|........|
|00000d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 08 00 |........|........|
|00000e80| f2 01 00 00 d0 02 00 00 | 00 00 06 49 6d 61 67 65 |........|...Image|
|00000e90| 31 d4 02 00 00 01 00 09 | 72 67 50 61 63 6b 61 67 |1.......|rgPackag|
|00000ea0| 65 d8 02 00 00 02 00 0a | 63 6c 62 4f 70 74 69 6f |e.......|clbOptio|
|00000eb0| 6e 73 dc 02 00 00 03 00 | 06 4c 61 62 65 6c 31 e0 |ns......|.Label1.|
|00000ec0| 02 00 00 04 00 0c 62 74 | 6e 43 61 6c 63 75 6c 61 |......bt|nCalcula|
|00000ed0| 74 65 e4 02 00 00 05 00 | 07 65 64 74 43 6f 73 74 |te......|.edtCost|
|00000ee0| e8 02 00 00 03 00 06 4c | 61 62 65 6c 32 ec 02 00 |.......L|abel2...|
|00000ef0| 00 04 00 07 42 75 74 74 | 6f 6e 31 03 00 18 00 00 |....Butt|on1.....|
|00000f00| 00 00 00 11 62 74 6e 43 | 61 6c 63 75 6c 61 74 65 |....btnC|alculate|
|00000f10| 43 6c 69 63 6b 15 00 00 | 00 00 00 0e 72 67 50 61 |Click...|....rgPa|
|00000f20| 63 6b 61 67 65 43 6c 69 | 63 6b 13 00 00 00 00 00 |ckageCli|ck......|
|00000f30| 0c 42 75 74 74 6f 6e 31 | 43 6c 69 63 6b 06 54 46 |.Button1|Click.TF|
|00000f40| 6f 72 6d 31 06 00 00 00 | 00 00 00 00 00 00 00 00 |orm1....|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 04 00 |........|........|
|00000f60| 00 00 07 06 54 46 6f 72 | 6d 31 4c 00 00 00 00 00 |....TFor|m1L.....|
|00000f70| 00 00 56 00 05 55 6e 69 | 74 31 00 00 55 8b ec 83 |..V..Uni|t1..U...|
|00000f80| c4 d4 53 56 57 33 c9 89 | 4d e0 89 4d fc 8b f8 33 |..SVW3..|M..M...3|
|00000f90| c0 55 68 54 01 00 00 64 | ff 30 64 89 20 8d 55 fc |.UhT...d|.0d. .U.|
|00000fa0| a1 00 00 00 00 e8 00 00 | 00 00 33 c0 89 45 ec 8b |........|..3..E..|
|00000fb0| 87 d8 02 00 00 8b 80 f0 | 01 00 00 8b 10 ff 52 14 |........|......R.|
|00000fc0| 8b f0 4e 85 f6 7c 24 46 | 33 db 8b 87 d8 02 00 00 |..N..|$F|3.......|
|00000fd0| 8b d3 e8 00 00 00 00 84 | c0 74 0c 8b cb b8 01 00 |........|.t......|
|00000fe0| 00 00 d3 e0 01 45 ec 43 | 4e 75 df 83 7d ec 00 0f |.....E.C|Nu..}...|
|00000ff0| 8e 81 00 00 00 8b 87 d4 | 02 00 00 8b 80 00 02 00 |........|........|
|00001000| 00 83 e8 01 72 07 74 24 | 48 74 40 eb 5d 8d 45 e4 |....r.t$|Ht@.].E.|
|00001010| 50 8b 45 ec 50 8b 45 fc | 50 8b 00 ff 50 2c e8 00 |P.E.P.E.|P...P,..|
|00001020| 00 00 00 dd 45 e4 dd 5d | f0 9b eb 54 8d 45 e4 50 |....E..]|...T.E.P|
|00001030| 8b 45 ec 50 8b 45 fc 50 | 8b 00 ff 50 30 e8 00 00 |.E.P.E.P|...P0...|
|00001040| 00 00 dd 45 e4 dd 5d f0 | 9b eb 35 8d 45 e4 50 8b |...E..].|..5.E.P.|
|00001050| 45 ec 50 8b 45 fc 50 8b | 00 ff 50 34 e8 00 00 00 |E.P.E.P.|..P4....|
|00001060| 00 dd 45 e4 dd 5d f0 9b | eb 16 b8 6c 01 00 00 e8 |..E..]..|...l....|
|00001070| 00 00 00 00 eb 0a b8 90 | 01 00 00 e8 00 00 00 00 |........|........|
|00001080| 8d 45 e0 50 dd 45 f0 db | 7d d4 9b 8d 45 d4 89 45 |.E.P.E..|}...E..E|
|00001090| e4 c6 45 e8 03 8d 55 e4 | 33 c9 b8 c0 01 00 00 e8 |..E...U.|3.......|
|000010a0| 00 00 00 00 8b 55 e0 8b | 87 e4 02 00 00 e8 00 00 |.....U..|........|
|000010b0| 00 00 33 c0 5a 59 59 64 | 89 10 68 5b 01 00 00 8d |..3.ZYYd|..h[....|
|000010c0| 45 e0 e8 00 00 00 00 8d | 45 fc e8 00 00 00 00 c3 |E.......|E.......|
|000010d0| e9 00 00 00 00 eb e8 5f | 5e 5b 8b e5 5d c3 00 00 |......._|^[..]...|
|000010e0| ff ff ff ff 1a 00 00 00 | 59 6f 75 20 6d 75 73 74 |........|You must|
|000010f0| 20 73 65 6c 65 63 74 20 | 61 20 50 61 63 6b 61 67 | select |a Packag|
|00001100| 65 21 00 00 ff ff ff ff | 24 00 00 00 59 6f 75 20 |e!......|$...You |
|00001110| 6d 75 73 74 20 73 65 6c | 65 63 74 20 61 74 20 6c |must sel|ect at l|
|00001120| 65 61 73 74 20 6f 6e 65 | 20 6f 70 74 69 6f 6e 21 |east one| option!|
|00001130| 00 00 00 00 ff ff ff ff | 02 00 00 00 25 6d 00 00 |........|....%m..|
|00001140| 53 56 57 55 8b ea 8b f0 | 33 d2 8b 86 e4 02 00 00 |SVWU....|3.......|
|00001150| e8 00 00 00 00 8b 86 d8 | 02 00 00 8b 80 f0 01 00 |........|........|
|00001160| 00 8b 10 ff 52 14 8b d8 | 4b 85 db 7c 16 43 33 ff |....R...|K..|.C3.|
|00001170| 33 c9 8b d7 8b 86 d8 02 | 00 00 e8 00 00 00 00 47 |3.......|.......G|
|00001180| 4b 75 ed 8b c5 8b 15 00 | 00 00 00 e8 00 00 00 00 |Ku......|........|
|00001190| 83 b8 00 02 00 00 02 0f | 94 c1 ba 02 00 00 00 8b |........|........|
|000011a0| 86 d8 02 00 00 e8 00 00 | 00 00 5d 5f 5e 5b c3 55 |........|..]_^[.U|
|000011b0| 8b ec b9 05 00 00 00 6a | 00 6a 00 49 75 f9 33 c0 |.......j|.j.Iu.3.|
|000011c0| 55 68 99 00 00 00 64 ff | 30 64 89 20 8d 55 ec b8 |Uh....d.|0d. .U..|
|000011d0| ac 00 00 00 e8 00 00 00 | 00 8b 55 ec 8d 45 f0 e8 |........|..U..E..|
|000011e0| 00 00 00 00 6a 01 68 c0 | 00 00 00 8d 45 f0 50 8d |....j.h.|....E.P.|
|000011f0| 45 d8 50 e8 00 00 00 00 | 83 c4 10 8d 45 d8 e8 00 |E.P.....|....E...|
|00001200| 00 00 00 83 c4 f4 db 3c | 24 9b 8d 45 e8 e8 00 00 |.......<|$..E....|
|00001210| 00 00 8b 45 e8 e8 00 00 | 00 00 33 c0 5a 59 59 64 |...E....|..3.ZYYd|
|00001220| 89 10 68 a0 00 00 00 8d | 45 d8 e8 00 00 00 00 8d |..h.....|E.......|
|00001230| 45 e8 e8 00 00 00 00 8d | 45 ec e8 00 00 00 00 8d |E.......|E.......|
|00001240| 45 f0 e8 00 00 00 00 c3 | e9 00 00 00 00 eb d8 8b |E.......|........|
|00001250| e5 5d c3 ff ff ff ff 11 | 00 00 00 54 44 4d 57 65 |.]......|...TDMWe|
|00001260| 62 4c 69 62 2e 50 61 63 | 6b 61 67 65 00 00 00 01 |bLib.Pac|kage....|
|00001270| 01 00 03 42 61 73 69 63 | 00 00 00 55 8b ec 33 c0 |...Basic|...U..3.|
|00001280| 55 68 25 00 00 00 64 ff | 30 64 89 20 ff 05 00 00 |Uh%...d.|0d. ....|
|00001290| 00 00 33 c0 5a 59 59 64 | 89 10 68 2c 00 00 00 c3 |..3.ZYYd|..h,....|
|000012a0| e9 00 00 00 00 eb f8 5d | c3 83 2d 00 00 00 00 01 |.......]|..-.....|
|000012b0| c3 6d 19 02 00 05 f8 00 | 01 f8 20 01 fa 08 01 f8 |.m......|.. .....|
|000012c0| 08 01 f8 10 01 f8 10 01 | 2e 08 01 ae 08 01 60 08 |........|......`.|
|000012d0| 01 62 08 01 c2 08 01 66 | 08 01 c4 08 01 c6 08 01 |.b.....f|........|
|000012e0| 5e 08 01 78 08 01 38 08 | 01 b0 08 01 44 08 01 46 |^..x..8.|....D..F|
|000012f0| 08 01 4c 08 01 9e 08 01 | aa 08 01 54 08 01 ac 08 |..L.....|...T....|
|00001300| 01 4a 08 01 5a 08 01 7c | 08 01 7a 08 01 7e 08 01 |.J..Z..||..z..~..|
|00001310| 84 08 01 40 08 01 88 08 | 01 94 08 01 96 08 01 42 |...@....|.......B|
|00001320| 08 01 98 08 01 9a 08 01 | 9c 08 01 50 08 01 4e 08 |........|...P..N.|
|00001330| 01 a0 08 01 56 08 01 a2 | 08 01 8c 08 01 8e 08 01 |....V...|........|
|00001340| 90 08 01 92 08 01 70 08 | 01 30 08 01 80 08 01 32 |......p.|.0.....2|
|00001350| 08 01 34 08 01 36 08 01 | 3a 08 01 82 08 01 86 08 |..4..6..|:.......|
|00001360| 01 48 08 01 8a 08 01 68 | 08 01 72 08 01 74 08 01 |.H.....h|..r..t..|
|00001370| 58 08 01 3c 08 01 3e 08 | 01 52 08 01 5c 08 01 64 |X..<..>.|.R..\..d|
|00001380| 08 01 6a 08 01 6c 08 01 | 6e 0c 01 f8 fe 01 01 02 |..j..l..|n.......|
|00001390| 30 01 1d 02 2a 01 2d 02 | 34 01 08 08 01 0a 08 01 |0...*.-.|4.......|
|000013a0| 10 08 01 20 08 01 22 08 | 01 24 08 05 fa 00 01 fa |... ..".|.$......|
|000013b0| 18 01 f8 08 01 2c 1c 05 | 01 02 2e 01 01 02 1c 01 |.....,..|........|
|000013c0| f4 0a 02 f6 5a 02 12 98 | 02 d0 3e 02 d0 3e 02 d0 |....Z...|..>..>..|
|000013d0| 1c 01 01 02 0a 02 28 0e | 01 01 02 0a 02 28 3e 01 |......(.|.....(>.|
|000013e0| 01 02 0a 02 b4 1c 02 a4 | 1a 01 01 02 10 02 d2 10 |........|........|
|000013f0| 02 d4 0c 02 d6 de 05 1d | 02 22 02 a4 54 02 14 18 |........|."..T...|
|00001400| 01 0a 0a 02 da 34 02 16 | 12 05 2d 02 26 01 2d 02 |.....4..|..-.&.-.|
|00001410| 1c 01 2d 02 0a 02 ec 16 | 02 e4 0e 01 2d 02 1a 02 |..-.....|....-...|
|00001420| e0 16 02 e6 1e 02 b6 10 | 02 28 1a 01 2d 02 10 02 |........|.(..-...|
|00001430| e8 10 02 d2 10 02 d4 10 | 02 e8 0c 02 d6 64 05 3d |........|.....d.=|
|00001440| 02 0e 01 3d 02 18 01 fe | 1a 01 3d 02 0c 02 d6 10 |...=....|..=.....|
|00001450| 05 41 02 04 01 fe 0c 06 | 41 02 90 36 56 a9 08 04 |.A......|A..6V...|
|00001460| 42 04 1a 06 0a 02 36 02 | 22 fc 1a 0a 06 02 14 02 |B.....6.|".......|
|00001470| 30 02 3e 02 3e 02 3e 06 | 18 04 14 02 ae 0c d2 02 |0.>.>.>.|........|
|00001480| 10 06 1a 06 5c 02 4e 08 | 0a 02 3a 04 30 04 d6 04 |....\.N.|..:.0...|
|00001490| b4 00 0e 91 02 02 b8 00 | 92 02 26 00 00 16 1e 93 |........|..&.....|
|000014a0| 3c 48 41 02 00 02 00 02 | fa 00 02 00 14 fa 02 02 |<HA.....|........|
|000014b0| 00 16 fa 04 02 00 18 fa | 06 02 00 1a fa 08 02 00 |........|........|
|000014c0| 1c fa 0a 02 00 1e fa 0c | 02 00 20 fa 0e 02 00 22 |........|.. ...."|
|000014d0| fa 10 02 00 24 01 02 00 | 06 04 28 26 4e fa 12 02 |....$...|..(&N...|
|000014e0| 00 26 1d 02 00 06 04 2a | 28 8c fa 14 02 00 28 2d |.&.....*|(.....(-|
|000014f0| 02 00 06 04 2c 2a a4 fa | 16 02 00 2a fc 00 02 00 |....,*..|...*....|
|00001500| 3e 05 02 00 02 00 0b 18 | 03 09 02 00 02 00 4e 0d |>.......|......N.|
|00001510| 02 00 02 00 50 11 02 00 | 02 00 52 15 02 00 02 00 |....P...|..R.....|
|00001520| 54 19 02 00 02 00 54 21 | 02 00 02 00 02 25 02 00 |T.....T!|.....%..|
|00001530| 02 00 8c 29 02 00 02 00 | 8e 31 02 00 02 00 05 e8 |...)....|.1......|
|00001540| 35 02 00 02 00 a4 39 02 | 00 02 00 a6 3d 02 00 02 |5.....9.|....=...|
|00001550| 00 b6 94 24 01 02 60 58 | 00 70 12 05 02 42 0a 15 |...$..`X|.p...B..|
|00001560| 02 9c 06 15 02 de fe 05 | 02 6d 05 fe 1d 02 60 00 |........|.m....`.|
|00001570| 00 f0 00 21 02 10 08 25 | 02 10 0c 21 02 d4 fe 25 |...!...%|...!...%|
|00001580| 02 d4 fe 2d 02 20 50 00 | 00 32 3d 02 20 00 00 00 |...-. P.|.2=. ...|
|00001590| 10 41 02 20 00 00 00 00 | 61                      |.A. ....|a       |
+--------+-------------------------+-------------------------+--------+--------+